home *** CD-ROM | disk | FTP | other *** search
/ BigMax 6 / BigMax nº 6 [rebuilt].iso / DEMOS / FOFAO / DISCOS.DXR / 00051.ls < prev    next >
Encoding:
Text File  |  1996-11-20  |  2.2 KB  |  87 lines
  1. on mouseDown
  2.   d1()
  3. end
  4.  
  5. on rightMouseDown
  6.   d1()
  7. end
  8.  
  9. on d1
  10.   global x1, x2, h1, v1, musica, t1
  11.   set the puppet of sprite 7 to 1
  12.   set the locH of sprite 7 to 72
  13.   set the locV of sprite 7 to 72
  14.   set x1 to 7
  15.   set x2 to "37"
  16.   set musica to "Pequeno Mundo"
  17.   repeat with d1 = 1 to 10
  18.     set the puppet of sprite 7 to 1
  19.     set the width of sprite 7 to t1 - d1
  20.     set the height of sprite 7 to t1 - (d1 * 8)
  21.     updateStage()
  22.   end repeat
  23.   set h1 to the locH of sprite x1
  24.   set v1 to the locV of sprite x1
  25. end
  26.  
  27. on mouseUp
  28.   discosVolta()
  29.   voltatamanho()
  30. end
  31.  
  32. on rightMouseUp
  33.   discosVolta()
  34.   voltatamanho()
  35. end
  36.  
  37. on voltatamanho
  38.   set the puppet of sprite 7 to 1
  39.   set the width of sprite 7 to 120
  40.   set the height of sprite 7 to 120
  41.   set the puppet of sprite 8 to 1
  42.   set the width of sprite 8 to 120
  43.   set the height of sprite 8 to 120
  44.   set the puppet of sprite 9 to 1
  45.   set the width of sprite 9 to 120
  46.   set the height of sprite 9 to 120
  47.   set the puppet of sprite 10 to 1
  48.   set the width of sprite 10 to 120
  49.   set the height of sprite 10 to 120
  50.   set the puppet of sprite 11 to 1
  51.   set the width of sprite 11 to 120
  52.   set the height of sprite 11 to 120
  53.   set the puppet of sprite 12 to 1
  54.   set the width of sprite 12 to 120
  55.   set the height of sprite 12 to 120
  56.   set the puppet of sprite 13 to 1
  57.   set the width of sprite 13 to 120
  58.   set the height of sprite 13 to 120
  59.   set the puppet of sprite 15 to 1
  60.   set the width of sprite 15 to 120
  61.   set the height of sprite 15 to 120
  62. end
  63.  
  64. on discosVolta
  65.   set the puppet of sprite 7 to 1
  66.   set the locH of sprite 7 to 72
  67.   set the locV of sprite 7 to 72
  68.   set the puppet of sprite 8 to 1
  69.   set the locH of sprite 8 to 141
  70.   set the locV of sprite 8 to 189
  71.   set the puppet of sprite 9 to 1
  72.   set the locH of sprite 9 to 202
  73.   set the locV of sprite 9 to 72
  74.   set the puppet of sprite 10 to 1
  75.   set the locH of sprite 10 to 270
  76.   set the locV of sprite 10 to 189
  77.   set the puppet of sprite 11 to 1
  78.   set the locH of sprite 11 to 333
  79.   set the locV of sprite 11 to 72
  80.   set the puppet of sprite 12 to 1
  81.   set the locH of sprite 12 to 404
  82.   set the locV of sprite 12 to 189
  83.   set the puppet of sprite 13 to 1
  84.   set the locH of sprite 13 to 468
  85.   set the locV of sprite 13 to 72
  86. end
  87.